home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1993 December
/
PSL Monthly Shareware CD-ROM (December 1993).iso
/
prgmming
/
dos
/
pascal
/
pars7.exe
/
PARS7GLB.PAS
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Pascal/Delphi Source File
|
1993-04-11
|
451 b
|
20 lines
unit pars7glb;
{$O+,F+}
interface
uses realtype;
type rpointer=^float;
onestep=procedure;
operationpointer=^operation;
operation=record
arg1,arg2:rpointer;
dest:rpointer;
next:operationpointer;
op:onestep;
opnum:word;
end;
var randomsize,randomresult:word;
randomiterates,contrand:boolean;
contrandresult:float;
implementation
end.